home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / PROGTOOL / JS.ZIP;1 / PROFILE.JS < prev    next >
Encoding:
Text File  |  1992-12-21  |  362 b   |  10 lines
  1. script=. 0!:2&<
  2. NB. 'out.fil' script 'in.fil'   OR   script 'in.fil
  3. NB.  OR   'out.fil' script ''
  4. copy=. ;:@[ 2!:4 <@]   NB. Copy item(s). 'qrl setrl' copy 'ut.ws'
  5. copyws=. 2!:1@< 2!:4 < NB. Copy all items from locale.  copyws 'ut.ws'
  6. display=. 9!:3
  7. display 2 4 5
  8. NB.  For a fuller Profile:  script 'ut.js'
  9. NB.  Return to DOS with:    Ctrl d   <Enter>
  10.